home *** CD-ROM | disk | FTP | other *** search
/ PC Home 109 / PC Home 109.iso / data1.cab / Program_Files / Id010.dxr / 00007_meme anim1.ls next >
Encoding:
Text File  |  2001-03-02  |  323 b   |  13 lines
  1. on exitFrame
  2.   puppetSprite(9, 1)
  3.   set LastTick to the ticks
  4.   set OriginalTick to the ticks
  5.   repeat while (the ticks - OriginalTick) < 85
  6.     set y to 2 * (the ticks - LastTick)
  7.     set LastTick to the ticks
  8.     set the locV of sprite 9 to the locV of sprite 9 - y
  9.     updateStage()
  10.   end repeat
  11.   go(the frame + 1)
  12. end
  13.